home *** CD-ROM | disk | FTP | other *** search
/ Colson Caster Selection Guide 3 / Colson Caster Selection Guide 3.0.iso / data1.cab / Program_Executable_Files / colsoncd.dxr / 00001Series_348.ls < prev    next >
Encoding:
Text File  |  2000-01-12  |  605 b   |  29 lines
  1. on mouseUp
  2.   puppetSound("mainsnd")
  3.   puppetTransition(47, 1, 8)
  4.   if field "diamodnum" contains "4" then
  5.     play frame "5steelc"
  6.     abort()
  7.   end if
  8.   if field "diamodnum" contains "5" then
  9.     play frame "5steelc"
  10.     abort()
  11.   end if
  12.   if field "diamodnum" contains "6" then
  13.     if field "mtmodnum" contains "79" then
  14.       play frame "5steelc"
  15.     else
  16.       play frame "5steela"
  17.       abort()
  18.     end if
  19.   end if
  20.   if field "diamodnum" contains "8" then
  21.     if field "mtmodnum" contains "79" then
  22.       play frame "5steelc"
  23.     else
  24.       play frame "5steela"
  25.       abort()
  26.     end if
  27.   end if
  28. end
  29.